home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Memphis Amiga Group / MAG New User Disk Set v1 (1993-12)(Memphis Amiga Group)(Disk 1 of 6).zip / MAG New User Disk Set v1 (1993-12)(Memphis Amiga Group)(Disk 1 of 6).adf / Rexx / OperatorHeadgap.term < prev    next >
Text File  |  1993-11-06  |  448b  |  32 lines
  1. /** AutoLogin ARexx Script for
  2.  ** Operator Headgap BBS - Written by MerliN
  3.  **/
  4.  
  5. say 'Attempting AutoLogin...'
  6.  
  7. timeout 15
  8.  
  9. wait 'handle'
  10. if rc ~= 0 then do
  11.     beepscreen
  12.     say 'Script Failed, Login Manually!!'
  13.     delay 2
  14.     exit
  15.     end
  16.     else send '\u\r'
  17.  
  18. wait 'password'
  19. if rc ~=0 then do
  20.     beepscreen
  21.     say 'Script Failed, Login Manually!'
  22.     delay 2
  23.     exit
  24.     end
  25.     else send '\p\r'
  26.  
  27. say 'AutoLogin Successful!!'
  28. say 'Script by MerliN!'
  29. delay 3
  30.  
  31. exit
  32.